home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 008 / semper.bas (.txt) < prev    next >
Encoding:
GW-BASIC  |  1984-08-10  |  1.8 KB  |  39 lines
  1. 90  CLS
  2. 100  PLAY "T185MN"
  3. 101  FOR I = 1 TO 32
  4. 102  READ M$
  5. 103  PLAY M$
  6. 104  NEXT I
  7. 110  DATA O3G8P8P8O4G4O3MLE16C#16MND4O2B8G4P8O3G8P8P8O4G4O3MLE16C#16MND4O2MSB8MNG4A8B4O3C8D4E8
  8. 120  DATA O3F4E8D4C8O2B4O3C8O2B4A8G8P8O3F#8G4A8B4P8MLB4.MNB8MSA8G8F8A8B8
  9. 130  DATA O3MNE8P8E8A8P8A8G8P8G8E8P8E8F8P8F8O4C8P8C8O3B8P8B8A8P8A8G8P8G8O4E8P8E8
  10. 140  DATA O4D8P8D8C8P8C8O3B4P8MLB4.MNB8MSA8G8F8G8A8MNE8P8E8A8P8A8G8P8G8E8P8E8
  11. 150  DATA O3D8MSO2B8O3D8G8D8G8MNB8G8A8B8O4C8C#8D8O2E8D8C8O1A8G8O3F#8G4A8
  12. 160  DATA O3B4P8MLB4.MNB8MSA8G8F8A8B8
  13. 170  DATA O3MNE8P8E8A8P8A8G8P8G8E8P8E8F8P8F8O4C8P8C8O3B8P8B8A8P8A8G8P8G8O4E8P8E8
  14. 180  DATA O4D8P8D8C8P8C8O3B4P8MLB4.MNB8MSA8G8F8G8A8MNE8P8E8A8P8A8G8P8G8E8P8E8
  15. 190  DATA O3D8MSO2B8O3D8G8D8G8MNB8G8A8B8O4C8C#8D8O2E8D8C8O1A8G8O3G8A8B8O4C8D8
  16. 200  DATA O4E4.G4.O3A4.B4.O4D4C8MLC4.MNC8O3MSC8E8C8E8C8
  17. 210  DATA O2MNB4O3F8MLF4.MNF8O2MSB8O3D8O2B8O3D8O2B8O3MNC4E8MLE4.MNE8G8A8B8O4C8D8
  18. 220  DATA O4E4.G4.O3A4.B4.O4D4C8MLC4.MNC8C8O3B8O4C8D8D#8
  19. 230  DATA O4E8G8E8C8E8C8O3MLG2.MNG4A8B4G8O4C8O3G8A8B8O4C8D8
  20. 240  DATA O4E4.G4.O3A4.B4.O4D4C8MLC4.MNC8O3MSC8E8C8E8C8
  21. 250  DATA O2MNB4O3F8MLF4.MNF8O2MSB8O3D8O2B8O3D8O2B8O3MNC4E8MLE4.MNE8G8A8B8O4C8D8
  22. 260  DATA O4E4.G4.O3A4.B4.O4D4C8MLC4.MNC8C8O3B8O4C8D8D#8
  23. 270  DATA O4E8G8E8C8E8C8O3MLG2.MNG4A8B4G8O4C4P8O3C4.
  24. 280  DATA O2MLA2.MNA8F8A8O3C4O2A8O3C2.
  25. 290  DATA O2A2.O2MLF2.MNF8C8F8A4F8
  26. 300  DATA O2MLC2.MNC4.O3C4.O2MLA2.
  27. 310  DATA O2MNA8F8A8O3C4O2A8O3C2.O2A2.
  28. 320  DATA O2MLC2.MNC8F8A8O3C4O2C8F2.O3A8O4C4F8
  29. 330  DATA O4E4.D4.O3D4.E4.A4G8MLF4.
  30. 340  DATA O3MNF4A8O4C4F8E4D8O3MLB4.MNB4G8B4O4E8
  31. 350  DATA O4D4C8O3MLA4.MNA4A8O4C4F8E4.D4.
  32. 360  DATA O3D4.E4.A4G8MLF4.MNF4.MLF4MNG8A4O4F8O3MLA4.
  33. 370  DATA O3MNA4B8G4A8MLF2.MNF4A8O4C4F8
  34. 380  DATA O4E4.D4.O3D4.E4.A4G8MLF4.
  35. 390  DATA O3MNF4A8O4C4F8E4D8O3MLB4.MNB4G8B4O4E8
  36. 400  DATA O4D4C8O3MLA4.MNA4A8O4C4F8E4.D4.
  37. 410  DATA O3D4.E4.A4G8MLF4.MNF4.MLF4MNG8A4O4F8O3MLA4.
  38. 420  DATA O3MNA4B8G4A8MLF2.MNF4
  39.